object FrmFilter: TFrmFilter Left = 428 Top = 467 AutoScroll = False BorderIcons = [biSystemMenu] Caption = 'Filter' ClientHeight = 71 ClientWidth = 348 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter ShowHint = True OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 96 Top = 8 Width = 109 Height = 13 Caption = 'files matching filter' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object txtFilter: TEdit Left = 208 Top = 8 Width = 49 Height = 19 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Lucida Console' Font.Style = [] ParentFont = False TabOrder = 0 Text = '*.*' end object Button1: TButton Left = 280 Top = 8 Width = 57 Height = 22 Caption = 'Set' TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 280 Top = 40 Width = 57 Height = 22 Caption = 'Cancel' TabOrder = 2 OnClick = Button2Click end object ComboBox1: TComboBox Left = 8 Top = 8 Width = 81 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 3 Text = 'Select Only' Items.Strings = ( 'Select Only' 'Select' 'Clear') end object cbIncludeFolders: TCheckBox Left = 8 Top = 48 Width = 121 Height = 17 Caption = 'include folders' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 4 end object btnResetFilter: TBitBtn Left = 258 Top = 8 Width = 9 Height = 17 Hint = 'Reset Filter' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = btnResetFilterClick end end